home *** CD-ROM | disk | FTP | other *** search
/ PC-SIG Library 8 / PC-SIG Library CD-ROM (8th Edition) (1990-04).iso / 1901_000 / disk1976 / prog5.tbc (.txt) < prev    next >
Encoding:
Turbo Basic Chain module  |  1989-08-22  |  49.8 KB  |  8 lines

  1. _>Y1\
  2. h@*T7
  3. Y!>s@a2U0*
  4. ffffff
  5. ffffff
  6. ?PERT
  7. Then press ENTERRemove the Star data disk and insert the Program diskPROG8.TBCPROG7.TBCPROG6.TBCPROG4.TBCPROG3.TBCPROG1.TBCPlease make your choice9........Exit to DOS           8........Galilean satellites   7........Moon                  6........Sun                   5........Comets & Minor planets4........Local sky             3........Eclipses              2........Planets               1........Stars                 Main MenuVulVolVir-8VelUMi80UMa50TucTrATriTelTauSexSerSctSclScoSgrSge19.5RetPyxPupPsAPscPicPhePerPegPavOriOphOct-80NorMusMonMicMenLyrLynLupLibLep5.5LMiLeoLac22.5Ind-55Hyi-70HyaHorHerGru-45GemForEriEquDra60DorDelCygCruCrtCrv12.5CrBCrAComCol-30Cir-60ChaCetCep75Cen-40Cas65Car-65CapCMiCMa-20CVn45CncCam70CaeBoo35AurAriAra-50AqlAqr-10Aps-75Ant-35And40197.9260.07170.241342.555062.814356.6396.110195   29     Amphitrite         134.4290.14850.212742.7791343.479144.6819.400   28     Bellona            255.2300.17150.274072.3472356.23194.8251.584108   27     Euterpe            229.9450.13510.178313.1263110.82436.0240.763234   24     Themis             212.6080.09780.198352.9120355.57766.47913.698   22     Kalliope           64.0580.16080.259212.4362249.76681.0243.070115   21     Lutetia            152.0920.14390.263582.4091254.919207.0290.702131   20     Massalia           287.8570.15800.258242.4423181.834211.7701.596215   19     Fortuna            81.9770.13720.254122.4686135.710125.6855.586109   17     Thetis             318.6800.13350.197182.9234227.581150.5083.089250   16     Psyche             327.8560.18490.229292.643797.491293.61911.765272   15     Eunomia            128.1940.16610.236912.586795.05286.8679.113158   14     Irene              132.7930.08630.238322.576581.16343.43816.522224   13     Egeria             29.5740.21960.276422.334068.720235.8638.376126   12     Victoria           29.8280.09940.256692.4520193.711125.7034.621150   11     Parthenope         32.9630.12010.177343.1376316.025283.8353.840450   10     Hygiea             270.8330.12190.267332.38655.31569.1125.585   9      Metis              176.3120.15640.301782.2013284.897111.1225.888   8      Flora              132.3070.22960.267482.3857144.723260.0985.514209   7      Iris               149.3090.20230.261112.4243238.520139.03914.782201   6      Hebe               227.7490.19170.238652.5741356.519141.7925.357117   5      Astraea            43.3140.09060.271632.3613150.175104.0157.139538   4      Vesta              115.4110.25800.226142.6682246.744170.55612.993247   3      Juno               273.7790.23470.213752.7703309.796173.32334.804608   2      Pallas             287.2650.07800.213962.768571.27480.70210.6071003   1      Ceres              10.2188.4189.80.3512.4796.051970Whipple                (1970)12.43177119.11831191.03900.5444281.38342816.73251988Tempel 2               (1988)160.5779974.0831670.212431.7211569.6572Sorrells               (1987)179.21482237.96291183.314540.991405.499353.35621984Shoemaker              (1984)3.7126.0357.30.3862.14210.50000001Schwassmann-Wachmann 2 (1974)9.7319.614.50.1055.4512.8Schwassmann-Wachmann 1 (1974)86.251.90.7051.1959315.141960Schaumasse             (1960)74.2255.2199.00.9550.77420.351954Pons-Brooks            (1954)4.0155.1354.90.1443.388057.61958Oterma                 (1958)44.685.464.60.9300.6421116.36Olbers                 (1956)15.0347.2346.80.7751.543056.11966Neujmin 1              (1966)79.897357.70287.0400.694359.0921985Hartley-Good           (1985)5.805131.70240.3160.641521.09915.051978Haneda-Campos          (1978)162.2393258.14397111.846580.96727250.58709929.43867Halley                 (1986)10.3733867.87735197.097780.314472.4688825.38121989Gunn                   (1989)1.1012242.552231.4870.151863.4242823.271977Gehrels                (1975)12.0334.2185.90.8470.3379824.8Encke                  (1974)28.9250.4196.00.9190.7430126.121956Crommelin              (1956)13.462.840.10.5771.7702627.951969Comas Sola             (1969)150.9277176.5673136.25741.01.0640398.583921961Candy                  (1961)134.71243208.856186.316211.00062163.328189220.59781983Cernis                 (1983)32.54269.0073.381.000.84774.1601987Bradfield              (1987)1.6648114.05267135.019431.055446103.378029410.12501982Bowell                 (1982)30.275.1352.700.6321.3159710.41974Borrelly               (1974)12.504941.95332348.814330.39641932.3069424.373901986Ashbrook-Jackson       (1986)1817162524232221191510571413121196432-1021-16129768-27306218502192521845116822101217812032960-183028DecemberNovemberOctoberSeptemberAugustJulyJuneMayAprilMarchFebruaryJanuary<N>ame  <E>xit                                                                                        <F B E>                               <F B E> 334304273243212181151120905931658697782878spacebar then <S>et it............... What day do you require ?      Select by using the dayswhich hasThe month of your choice is now spacebar and then <S>et it......  What month do you require ?      Select by using the <F>orward    <B>ackward    <S>et valueWhat year do you require ?    Select by pressing Please answer these questions............*   <E>xit to main menu   ***   <T>emporary change the date   *****    Touch the space bar to continue    ***_########.####.############<F>orward     <B>ackward       <C>ontinue  Angle of inclination              Diameter (km)              Angle of inclination               Argument of the perihelion   Longitude of the ascending node    Mean daily motion           Eccentricity of orbitPerihelion distance (A.U)       Eccentricity of orbit       Date of Epoch      Date of perihelion passageWhat is the diameter of the asteroid ...............What is the mean anomaly ...........................What is the eccentricity of orbit ..................What is the mean daily motion ......................What is the mean distance ..........................What is the argument of perihelion .................What is the longitude of the ascending node ........What is the inclination of the orbit ...............30     UraniaWhat is the name of the minor planet ...............The day  dd.d What is the date of the Epochalmanic offices of the United Kingdom and The United States of America.found in The Astronomical Ephemeris,   which is prepared by the nauticalvalue of the minor planet to Urania.   Data for the minor planets can beWhat is the inclination of the orbit i .............The inclination, i, is the angle between the orbital plane and the ecliptic. ......What is the longitude of the ascending node plane from the March equinox. The longitude of the ascending node is measured eastward in the ecliptic What is the perihelion longitude  w ................ascending node to the perihelion point and in the direction of motion. The argument of perihelion, w, is the angle in the orbital plane from the What is the perihelion distance  q .................of orbit (a) multiplied by one less the eccentricity (e). q = a * (1 - e) The perihelion distance is in Astronomical Units. It is the semi-major axis What is the eccentricity of the orbit  e ...........The eccentricity, e, of a comet is usually more than 0.1 and less than 1.1 The day  dd.dddd The month 1 - 12 The Year YYYY What is the date of the perihelion passageUse for example 1978  2  2.4164 Arend-RigauxWhat is the name of the comet.......................Please type the name of the comet and then press ENTER value of the comet to Arend-Rigaux 1950 VIIAll angles in degrees. Just pressing enter to each question will set theMinor planetComet             <M>ove arrow     <N>ew page      <C>ontinue        <E>xit       <1) Chose a new comet        <2> Chose a new minor planetnumber of all asteroids is estimated at 50,000 to 100,000.small planet-like celestial bodies of the solar system.     The totalapproaches the Sun a tail develops from the nucleus.    Asteroids areComets are among the most impressive of natural phenomena. As a comet                   <E>xit                        Y/N Turn on or off the sound effects              <C>omets and Minor Planets                                                           Never rises at     Never sets at    Sets at  Rises at EastWestSouth0          Please make your choice          Spectral type    Dec.      R.A. Dec. R.A. fFFfBbEesSbdD            Working                    <M>ove object   <D>eepsky   <B>right stars   <S>tars   <N>ame   <E>xit<M>ove object     D B S N        <E>xit  Working on the constellation names   wpP     +:####.##########.#Julian date <W>idth of map in degrees is     Faintest star mag.<T>ime added to the clock Touch the space bar for a new date     <P>lot orbit       <E>xit     Date       Object-Earth Dist:   Object-Sun Dist:       R.A.        Dec.tT   Julian date Todays date is  ndstth        Comets and Minor Planets        ynNeEcConOFFoffON  Main  Menu       * * *  THE NIGHT SKY  * * *       mMSGDNGCOCPN    Working on the deepsky objects      Press spacebar to stop drawing stars       Working on the bright stars       -BRIGHT3.DATMAG5.DATDEEPSKY2.DATDEEPSKY.DATYWRBMAG3.DATThank you   Reading datathe Star data disk.        Then press ENTER.Remove the Night Sky program disk and insert           * The Night Sky *           HOME.DAT
  8.